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COMPUTER SHOW HELD 


The SOUTHWEST COMPU- 
TER SHOW was held at 
the Dallas Market Hall 


April 9-12 with over 
150 companies showing 
mini and micro compu- 


ters, software, printers, 
plotters, hardware, etc. 


80-Computer Users of 
Houston member, Mike 
Hunt reports that the 
big names in micro com- 
puters were displayed at 
the show,including 
Apples, Ataris, and TRS- 
805. 


According to Hunt, 
several booths were set 
up for selling software, 
however few were actual- 
ly demonstrating the 
programs. Those that 
did demonstrate pro- 
grams limited the demon- 
strations to programs 
the company selected 
and did not demonstrate 
any programs that some- 
one was thinking of pur- 
chasing. 


Hunt noted that it 
appeared that those pur- 
chasing software knew 
about the software, af- 
ter apparently seeing 
the program played some- 
where else. 


Several booths seemed 
to attract more atten- 
dees than others. Hunt 
reported that those at- 
tending the Show were 


able to operate the com- 
puters at the Radio 
Shack booth. 


Hunt added that sev- 
eralmembers of the 
Dallas TRS-80 users 
group manned a booth 
to explain the purpose 
Of a users group and 
give advice to those 
requesting it. 


One of the biggest 
crowds around a single 
booth was at the Adven- 
ture International booth. 
Many of those attending 
have become "hooked" on 
the Adventure games and 
stopped by the  Adven- 
ture International booth 
to meet the author, 
Scott Adams. 


Hunt noted that the 
young and old alike en- 
joyed meeting the several 
computerized robots that 
roamed throughout the 
Show. Children attend- 
ing especially enjoyed 
talking with the robots 
and watching them follow 
people. 


Hunt saw a particu- 
lar interesting piéce 
of software at the show, 
which is reviewedon 
Page 6 of this issue of 
USERS' NEWS. 


KAKA KK koe KK AKA RAKE KK EK 


TRS-80 is a trademark 
of Tandy Corp. 
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EDITOR'S COMMENT....... 


It appears that everywhere you turn you see 
something or hear something about software рігасу- 
the "stealing of software" to avoid the purchase 
of same. To date, the definition of “stealing 
software" in our group has meant the exchange--or 
"swapping" of programs..... the making of several 
program tapes or disks from one which has been 
purchased "legally"; however, at the last meeting 
of 80-Computer Users of Houston, "stea ling of 
Software" took on a new meaning. Someone attending 
the April meeting stole a program tape belonging 
to a member of our group. This was a program tape 
which was being used on the TRS-80 brought to the 
meeting by Robert Eden. Many of our members look 
forward to seeing a new or different program de- 
monstrated after the meeting. It has been diffi- 
cult at times to get someone to bring their sys- 
tem to the meeting for a demonstration....however 
in the end, someone always volunteers. Will it 
now be more difficult to get a member to bring 
his computer, etc.? Would it run through the voi- 
unteer's mind that "If I bring my system, will 
something of mine be stolen?" I think not. It is 
my understanding that something like this has not 
happened before; therefore, I feel this is а 
Singular instance. Maybe it was out of pite---or 
jealousy. Maybe someone wanted а copy of that 
particular program and did not want to buy it or 
ask Robert to use it. Whatever the reason, it is 
no excuse for taking something that belongs to 
Someone else. Whether the program was an ori- 
ginal or a copy does not matter. What matters is 
that the cassette did not belong to whomever stole 
it. It would be nice to know the members of 80- 
Computer Users of Houston сап trust each other 
again. So, whomever STOLE the program cassette 
from the demonstration area at the last meeting, 
please return it. You can do so anonymously by 
sending it to USERS' NEWS, Р.О. Box 20000 #220 
Houston, Texas, 77025. 
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President, Bill Young, did not submit a column for 
A NOTE FROM THE PRESIDENT. 
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80-COMPUTER USERS ОҒ HOUS- 
TON meets the first Wednesday 
of each month. Anyone interested 
in microcomputers is welcome to 
join our group. Membership dues 
are $5.00 per calendar year, which 
includes your subscription to 
USERS' NEWS. 


USERS' NEWS 


EDITOR: Brigitte Schaefer 
PRODUCTION: John Schaefer 
THE PROGRAM DOCTOR: E. Wood 
A NOTE FROM THE PRESIDENT: 
Bill Young 

TAPE LIBRARY: Floyd Atkinson 
MICRONET NEWS: Ben Taylor 

* * * * * 


USERS' NEWS is published month- 
ly by 80-COMPUTER USERS OF 
HOUSTON. Mail contributions, let- 
ters to the Editor, comments, etc. 


to: 


P. O. Box 20000, No. 220 
Houston, Texas 77025 
or phone (713) 663-7293. 


* * * * * 


ADVERTISING: Open rate for dis- 
play advertising. $1.00 per vertical 
column inch. Minimum billing on 
any advertising is $3.00. Special 
frequency discounts. No charge 
for personal advertising by mem- 
bers. 

DEADLINE: 15th of month prior to 
publication. 

TIONS: Included in 
ues. Individua! issues 
available to non-members for 754 
per issue. No charge for news- 
letter exchange. USERS’ NEWS 
mailing list is available for sale. 
Publisher does not assume respon- 
sibility for programs and other 
material submitted that may be 
copyrighted. 

DO NOT SUBMIT COPYRIGHTED) 
MATERIAL. 





SOLUTION TO CIPHER. BY 

RICHARD FLORES presented 
at last meeting: "IF YOU 
HAD TROUBLE...." 


VISITORS WELCOME... 


Nor-member visitors 








are welcome at meetings 
of 80-Com.uter Users of 
Houston. All we ask is 
that 1° you have enjoyed 


the meetings, consider 
joining our group. Mem- 
bership dues at this 
time are prorated to 
$ 4.00 for the remainder 
of the year. (The dues 
are regularly $5.00 for 
Jan.-Dec. memberships.) 

Your dues help pay 
for your subscription 
to USERS' NEWS. The 
club needs everyone's 
support, so beomce a 
member. $ 4.00 isa 
small fee to pay for 
the help and knowledge 
you receive through the 
club. Even the tightest 
budget can fit in $ 400. 


HINT... 


Here is a simple way 
to get the down, left 
and right arrows to 
show up on your video 
screen when inputting a 
program to be put onto 
cassette or disk. The 
three arrows cannot be 
simply typed from the 
keyboard. 

When  inputting a 
line, begin typing the 
line. When you get to 
the place where the ar- 
rows go, do the follow- 
ing: With your left 
hand, simultaneously 
depress the "I" and "ү" 
keys. Then, with your 
right hand, type "K""L" 
"M" and "N" and youwill 
get the arrows inbetween 
e letters. Enter the 
line апа then delete 
the unwanted letters by 
using EDIT. This will 
leave the arrows апа 
you can finish typing 
the line. 

Using this method, 
you use only one byte 
for the down arrow in- 
stead of the five - byte 
"СНВҘ (92) ", etc.... 





WANTED: TRS-80 PEN PAL 


Interested in a TRS- 
80 pen pal? J. Lehner 
of Venezuela would like 
to get in touch with 
someone who has inter- 
ests that are similar 
to his. He has a TRS-80 
Level II, 32k, with one 
Radio Shack Drive and 
опе Pertec TFD-200 77 
track drive. He also 
has a quick printer and 


R.S. Line Printer II. 
He uses his equipment 
as a hobby. He likes 


experimenting with dif- 
ferent programming lan- 
guages and operating 
systems. 

Mr. Lehner would 
like to hear from any- 
one running CP/M, APL, 
COBOL, CBASIC 2, E- BA- 
SIC, FORTRAN or PASCAL 
on a TRS-80 Level II 
with a mixed disk drive 
system like his. He 
would also like to hear 
from anyone who uses 
the omikron Mapper I 
and Mapper ІТ and апу- 
one using the Freedom 
Board Т8/05. 


If interested, write: 


J. LEHNER c/-S.P.A. 


APT. 191 EL TIGRE 
EDO. ANZOATEGUI 
VENEZUELA 
— 
= go 
—- 
LL 
— 


CLASSIFIED ADS.,.. 


FOR SALE Two 64k R.S. 
Model If ard disk, 
NEC Spinwriter & Сеп- 
tronics 702....CPM, Oa- 
sis, апа lots of pro- 
grams in TRSDOS....Call 
Joe Stanfield..466-3535 
(days) 


* * * 





WANTED----- Hardware Re- 
views, Hardware Short- 
cuts, Software Reviews, 
Programming Tins, Мада- 
zine Article Reviews, 
Book Reviews, Business 

Program Reviews, etc... 
Remember, no submission 
is too elementary---our 
members аге at all 1е- 
vels of computing..send 
submissions to  USERS' 
NEWS, Р. О. Box 20000, 
#220, Houston, Texas, 
77025. Questions about 
submissions should be 
directed to the Editor- 
663-7293 after 7 p.m. 


ж ж ж 


WANTED----artist inter- 

ested in computers to 

draw dingbats (fillers) 

and cartoons for USERS' 

NEWS. Nothing elaborate 

required....just simple 

line drawings..call the 

Editor at 663-7293 after 
7 p.m. 


* * * 
REMINDER... 
Election (or reelec- 
tion; of officers for 


the next term of office 
(June-December) will be 


held at the June meet- 
ing. Remember, only 
paid-up members of 80- 


Computer Users of Hous- 

ton can vote in the up- 

coming election. Pay 

your dues now to have а 

voice in whoour officers 
will be. 
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йб FILLES 
HEN 1“ 
| мн] 15 RSC INPUT РОМ NENE", Pond 


Ке 2, kê 


290 Set 
380 IF EEz THENA2G БЕШЕНЕ, TAS. 18651 T 
төраға) THEN EF 

HE NLENCTPS) V=04 ATF? | 
388 FR zi) IF MIDS TPS, Хе "THEN GOSUESOD “LARC. )SMLOSCTPS, XT) PRINT “WRITE. iT TO PRINTER & DISK +525816098500 
ТЕТЕ ELSE NEXT 
1-0 ТАРЕ" "ТРЕ PRINT," °, TPS ШӘ ELSE 0010388 
268 ЕГАР, TPF 

AZB PRINT -LPRINT:LPRIMT*DONE® 

444 LERET CHRECID 

468 ASE 

490 0 





өй 









220 





25 
GAG IF 582255 THEN 00906560 RETURN 

620 IF MIDECTPS Хог, 102" "THEN Те2 RETURN ELSE HEAT? 
648 T=2: RETURN 

668 1=2755- RETURN 

680 LPRINT* PROGRAM МАМЕ I5 “i PONS КЕТЕН 


Keith Weilbacher submits "PLEX", which converts multiline programs to single 
lines. It may be useful when compiling a basic program. 


1. Save program to be converted on disk in ASCII 
a. save "X", A 


2. Any drive assignments having : will have to be worked on as program 
is searching for : to process 


a. open "R", "TEST:1" 


3.  Renumber program prior to processing with basic R. 
The "PLEX" program adds‘ 1 to previous line number. 
Ж You may overrun sequence. 
a. 10 CLS 10 CLS 
19 PRINT,PRINT 19 PRINT 
20 A=1 20 PRINT 
20 А=1 


Keith notes that this is an experiment in global search. 
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ҰЖ DEFINE YOUR РКІ 





by B.C. TAYLOR 





LS ttt EEEE OIG ЖЖЖ Ж УЙЛА ж 


...At our April lst meeting, Joe Stanfield gave a talk on simple DEF FN's, and Royce Bordman pê 

a DEP FN statement on the black board that was 12 feet long! By coincidence, I had been foolint 

with DEF FN's for PRINT-@ statements on MicroNet 80-Users board for the prior week. t camej&- 

bout like this!..Rick Taylor (mighty fine last name, there) put a program in his MicroNet "file 

space" for anyone to download and use to check MicroNet's charges. It found a $ 5.00 ескек, fer. 

him. So I down-loaded it and found that part of the display looked like this: е 
TOTAL TYMNET TIME CREDIT 

15.2 493 c 

I was facinated by this, because it had not occurred to me to open my buffer, catch the Mitre 

Net "Detail" charges, save them to disk, then test them for accuracy.--Of course I had to improv 

the program (who can resist doing ‘that?), and before too long the display looked like this: 

CHECK on CompuServe/MicroNet CHARGES 


READI NG=> O8-MAR-81 22: 38/23 




















:MNET--- = -TIME -CHARGI 
ON OFF CALC ММЕТ DIFF CALC MNET DIFF 
22:38 23:46 1:8 68 9 5.67 5.67 0 4 


ТҮММЕТ:ІТЕМ= 





MNET+TYMNET: CUM. МЕТ CHARGE= 5.16 DIFF= 0 


That display is, of course, a "video mask" -- the words stay put but the numbers go flickety- 
flick all around the video as the program reads the schedule of charges, and calculates what the 
ought to be. In the original version, Skip had placed the words in the mask by using PRINT-G 
statements like this: 100 PRINT 8 192, "TOTAL" 

110 PRINT 8 202, "ТҮММЕ 

120 PRINT 8 212, "TIME CREDIT"; 

and to position the numbers on the video, 

320 PRINT 8 276, T2; 

etc. 
(I won't go into extracting the numbers from the disk file of schedule of charges...that's far 
from the point of this story. But you can see one line of such a file after the "READING=>" in 
the video mask above, and all the numbers on display are derived from this.) Now, I have trouble 
enough selecting the right Print-@ number for the start of any line, without arriving at a” Print 
@ number to put the.word or number out in the middle of the display, so I used Print-@ statement 






of this nature: 1780 PRINT @ 384-32, VAL(MIDS(A$,7+7,3))-(BH*60+EM) ; 

1790 PRINT G8 384+43,C; 
Then I up-loaded the enlarged program into my MicroNet filespace, -- the first few remark lines 
still giving Skip his original by-line, and now also giving credit %о пе -- and notified Skip.by 
Email to look at it and maybe approve? (I've never seen Skip, don't know where he lives and works 
After receiving his amiable go-ahead, I put a message on the MNNET80 board (--that's for TRS-80 


übers on MicroNet) that MNCHG.BAS<70070,234>was available. 

Two days later there was this agonized message on the MNET-80 Board from a Model-II owner, tc 
the effect that he was having pure hell adapting it to Model-II, and why didn't we use variables 
for Print-@ locations, because he had no idea what the Model-I video mask was supposed to look 
like. I'm afraid I was not too sympathetic. Imagine anyone not knowing what a Model-I is all 
about! I composed a message using Electric Pencil and uploaded it onto the MNET-80 board tellin 
him that translating was easy--my Print-@'s were of the form "PRINT G XXX + YY", where the XXX 
was the start of the line, and the YY as the number of spaces out on it.  Andit was easy to.trans: 
form the XXX from a 64-characters-per-line lay to an 80-character-line. But Skip was more ir 
genious and tender-hearted. By the next day, he had completely re-worked this 9600-byte progran 
replacing all PRINT-@'s (and believe me, that program is full of PRINT-@'s!) with this device: 














65 " To change for а wider/narrower screen all you have to 
66 ! do is to change the variable NC in line 70 to reflect 
67 ' the number of columns/line you have on your CRT. 


68 ' 

70 ' CLEAR 3000: NC = 64" МС = $ chars on video line 
75 DEF FNP(R,C) = NC*R+C 

format = Row,Column " р‏ ر 





1780 PRINT € FNP (7,32), УАІ,(МІр5(45,Т%7,3))-(ЕНА6ОҒЕМУ” 
1790 PRINT 8 РМР (7,43), С; 






Line 1790 is saying, of course, PRINT AT the 7th row down and 43 characters out. I think 
this is a fine device -- never have to look up or calculate a PRINT-@ location again. And by. 
simply changing the value of "NC" in the statement at line 70, the program will automatically 
adapt to anybody's video--Model-If, Color Computer, SuperBrain (Hi, Kip Bartran!) or even on 
(ugh!) Apple. (And by swapping those two numbers around (7,43), it will even run on Royce's 
OASIS system!) But that was not quite the end of it on MicroNet. While Skip was burning the 
midnight oil, modifying all those PRINT-@'s, Harry Lennox Lee, who is with SBSG/QSD (Small 
Business Systems Group/Quality Software ), put a message on the MNET-80 board with a slightl 
different form: DEF FNPA(line,col) = 64*(line-1) + со1-1 id 

"where line is 1-16, col is 1-64. For the Mod-I," 
.then all that must be changed is the DEF..." 
And in the subsequent message, Harry Lee says: "I stole the idea from Eric Podietz of Digital 
Mercury 4 years ago. Ме did it because you had to generate different strings of control codes 
for different terminals at different installations...great minds think alike...Skip and Eric 
came up with the ideas independently. Us lowlifes steal what good ideas we can!..." 

Two other "universal" devices that will help make our programs run on Model II's or others 

are: 80 CL$ = CHR§ (30) ы clears to end of line 
85 CES CHR$ (31) * clears to end of frame 


It turns out that on a Model II, CHR$(30) converts to а double-wide display! So skip changeé 
all CHR$( ) statements to variables defined at the start of the program, so that they can easily 
be changed by users of other systems. 





a disk basic specialty. The first version of line 
in Level-II Basic. 


Note: Tape pullers don't have DEF FN--th 
L700 shows the easier way to handle PRINT 








PROGRAM REVIEW BY MIKE HUNT 


At the SOUTHWEST COMPUTER SHOW in Dallas, Mike Hunt came across a program 
called "Scriptplus" which is a modification for Scriptsit, which allows one 
to take advantage of a lot of "word processor" extras. Using Scriptplus can 
give you the capability to change to expanded characters, change the number 
of characters per inch, underline, mix print sizes (including in mid-line), 
depending on the type of printer the user is operating. “Міке says Scriptplus 
is not supposed to crash programs in high memory, that end returns "dosready" 
instead of rebooting the operating system and alphabetically lists the list 
directory "within Scriptplus and works with VTOS, LDOS, TRSDOS, DOUBLE DOS, NU- 





DOS, however NUDOS-80 is not supported. Scriptplus is compatible with double 
жар pate Mike feels that for the price, Scriptplus is a very good program 





considering all the extras it contains. 


Scriptplus is available from QUALITY SOFTWARE DISTRIBUTORS, 11500 Stemmon 
Express., Suite 104, Dallas, Texas, 75229 (214-484-2976). The program sells 
for $ 19.95. 


TRACKDMP / CMD 


By Elmer Bailey 


Ав you probably know the data on a diskette іс only a 
part of the information that it contai . There are gaps, 
address marks, sector length bytes, Cic's, etc. between the 
data blocks. During a normal read, the information between 
data blocks is used by the disk controilor, but not passed 
on to the processor. The  TIRACEDHMF/UfPD program displays 
everything that a selected ti ack contains. 











TRACKDMP/CMD first asks if the output is to go to the 
printer or video. After a selection 16 made, it asks for a 
track number in decimal. When you give it а track number, 
it seeks track zero so that it will nol have to depend бю 
track numbers written on the diskette. Then it steps to ‘the 
selected опе by counting. Then it begins reading оз the 
first index mark that :t encounters and continues until the 
next index mark. All of this is put into a buffer and thon 
read out to either screen or printer in texidecimal. басп 
Output line starts with a two character sector aber 
*ollowed by a three character relative byte mumber. Next i5 
a space followed by 15 bytes in two byte groups and 
the ASCII equivalant to the same 16 bytes. In the 
section none printing characters are printed as periods. 









The usual format for а sector is: 





Bap #1 (several bytes of FF and/ar 00) 
ID Address Mark .... FE 

Track number 1..- ХХ (Same that you selected) 
Separator .. .... 00 





Sector Number ...... XX (О through 9) 
Sector Length ...... 01 (00-128, O1=256 bytes) 
А (2 bytes) 











Gap #2. * several bytes of FF and/or OO) 
Data Addres Ев 

Data ............... (256 Bytes on RS) 

Data CRC ......... (2 bytes) 

Bap BS 222i -... (several bytes of FFand/or ОО) 


if you are ing at it on the screen, the display 
will stop when the screen is full. Press enter to go to the 
next 256 bytes. When the buffer is empty, the program will 
return for another selection. 





Take a loot et с few of your  disketts and then take a 
look at Micrasof = 5ture diskette. You should be able 
ap will not read it. If you have 
жей diskette, try TRACKDMP/CMD on 
why it only reads random sectors on 





to see why DOS or 
3 








access to а t 
one. Can you figure c 
a hard sectored track > 

If you don’t have  TRACEDMP/CMD, you can get it from 
the club disk library. 


















i. SCREEN INPUT ROUTINE 
akar СІҢ яак 
WRITTEN EY JOE STANFIELD 


50 CLEARIDOQO 







7р. * БЕТ UP А SCREEN MASK IN THIS AREA FOR ANY INFORMATION THAT YOU 
WANT DISPLAYED ON THE SCREEN 
S.PHINTTAE(10)"S CR E EN I.N P UT ROU T I М E".PRINT9140,"NAME: ' 
T@194,"STREET ADDRESS ";:PRINTG268,"CITY ";'PRINTG331,"STATE: ", 


BEGIN ENTRY OF DATA 
SET SCREEN LOCATION TO BEGIM GRAPHICS BLOCK 
SET THE MAXIMUM LENGTH OF THE GRAPHICS BLOCK 
STORE DATA ІМ YYS FOR EDITING LATER 





GCSUBSO00' GO TO THE INPUT SUBROUTINE 
F -1ТНЕМ100' IF UP ARROW - СО UP TO NEXT BLOCK 
yvs' CONVERT BACK TO REQUIRED VARIABLE NAME 


THE REMAINING ENTRY LINES WILL BE COMBINED IN ONE 

10: У=20: УУ$ =Аррѕ : СОБОВ5000 IFIx-1THENIOOELSEADDSeYYS. 
274:Y=10:YY$S=CITY$:GOSUB5000- IFI=-~1THENLIGELSECITY$=YY$ 
328.Yz10 YY$2STATES.COSUBSOO00. IFIs-1THENI20ELZESTATES$sYYS 


GOSUB@000: IFCHS$z"N'THEN100 
CLS GOTO50 


' INFO CORRECT SUBROUTINE 

PRINTe818,"ALL CORRECT (¥/N)?" 

CHSsINKEYS:; IFCH$2""THENA4010 
IPFCHSz"Y"ORCHSs"N'THENPRINTG9815,CHR$(310; RETURNELSE4010 


Б SUBROUTINE FOR VARIABLE INPUT 








PRINT@ZZ+1,STRINGS(Y,143); ° PRINT A BLOCK OF GRAPHICS CHARACTERS THE 
LENGTH YOU HAVE SET FOR 'Y' 
PRINTGZZ,"";' MOVE THE CURSOR BACK TO BEGINNING OF THE FIELD 
Xs0:Z2$2""* SET INITIAL VALUES OF THESE 2 TO 0 
YYsZZ' SET UP AN ADDITIONAL POSITION COUNTER 
1-0" SET TEST FLAG FOR UP ARROW 
WS2a1NKEY$: ІЕМ9 =" "ТНЕМ5050' WAIT UNTIL USER PRESSES A KEY THEN 
ASSICN ІТ TO Ws 
5060 Х=Х+1' INCREMENT THE # OR CHAR COUNTER 
5070 WeASC CWS)" FIND ASCII VALUE OF THE KEY YOU FRESSED 
072 IFWs10THENS18580" MAKE DOWN ARROW ACT THE SAME AS (ENTER? 
5074 ІЕМООВІТНЕМ5080” TEST FOR UP ARROW - IF МОТ PROCEED 
52075 Is-1' SET UP ARROW FLAG 
5078 PRINTGYY,STRING$(Y,32)," BLANK OUT LAST СВАРНІСЕ BLOCK 
5077 2$%=""' ERASE 25 
5078 GCOTOS190* GO TO END ROUTINE TO RETURN 
5080 IFWe24THENZZ-YY:COTOSO000" TEST FOR SHIFT-BACK ARROW ANDSET POSITION 
COUNTER BACK TO THE ORIGINAL POSITION AND 
RETURN TO BEGINNING OF ENTRY 
5085 IFW(O8THENS140 ' TEST FOR BACK ARROW IF NOT PROCEED 
5080 IFZZ(-YYTHENSI140' TEST TO MAKE SURE YOU DONT BACK UP OVER THE LEFT EDGE 
OF THE GRAPHICS BLOCK 
5095 К«Х-2: SUBTRACT 2 FROM # OF CHAR COUNTER 1 FOR THE CHAR 
YOU WANT TO REPLACE AND 1 FOR THE BACK ARROW. 
3100 PRINTGZZ,CHR$(143);" PRINT A WHITE ELOCK OVER THE LAST CHARACTER. 
2110 72«22-1" MOVE THE CURSOR POSITION BACK ONE MORE 
5120 ZS»LEFT$(ZS,LEN(ZS)2-21)5*" STRIP THE LAST CHARACTER OFF OF THE STRING 
5130 GOTOSO50 ' GO BACK TO ENTER ANOTHER CHARACTER 
5140 IFWe13THENCOTOS18980 ' BREAK CUT OF ENTRY ROUTINE IF KEY IS AN (ENTER>, 
5145 1ІЕХОҰТНЕМХ«Х-1:60705050: TEST FOR RIGHT LIMIT OF BLOCK IF EXCEEDED 


SUBTRACT 1 FROM # OF CHAR COUNTER AND GO TO 
CHARACTER ENTRY 





$150 22е2241" OTMERWI7E ADD 1 TO POSITION COUNTER 

:160 PRINT8ZZ,W$;' PRINT THE CHARACTER YOU JUST ENTERED 

5170 Zo=Zo4ws ADD THIS CHARACTER TO THE STRING OF CHARACTERS. 

3180 С0Т05050" GO BACK TO ENTRY FOR ANOTHER CHARACTER 

5190 * END ROUTINE 

5200 PRINT@ZZ+1,STRINGS (¥-X+1.22). BLANK OUT REMAINING GRAPHICS CHAR 

5210 IFZS$(O""THENYY$-2$:COTOS240" TEST FOR А NULL STRING AS WOULD OCCUR 


IF ENTER WAS PRESSED DURING THE 
REVIEW PHOCESS IF NOT NULL THEN 
Fint ASSIGN YY¥#=Z$ AND RETURN 
220 PRINT@ZZ+1,¥¥8/" ERINT THE OLD VALUE OF THE STRING AT THE 
CATION 22 SO THAT THE SCREEN WILL REFLECT 
THE SAME INFO AFTER EDITING 
5230 26-Ү7%" TRANSPOSE VARIABLES SO THAT ALL WILL МОТ BE NULL 
AFTER RETURN. 








5240 RETURN 





PROGRAM. REVIEW. BY: ROBERT EDEN ES 









1 мазча? $ 

It has becu a long day...how, being a former arcade addict, and now а come!) 
puter hobbist, 1 must take my medication. Sitting in my plush chair,, TW У 
behind myn electronic marvel for the touch of life...An inspiring gleam < Gomes 
the message "MEMORY SIZE?" appears on the screen. A towe ho of. 





tomy eye х 
R= key and 1 am READY. 1 kev in SYSTEM for no apparent reason, à 

then to the unusual prompt, NOVA. Тһе wait seems endless (for I am. 
spinner), but finally loading is complete and I stride. 
the little white key. ۹ V 
My hands go for the control keys. Му finger begins to dance on 
button... ы N Westin 
(NOTE: For those ОҒ you unfamiliar with the trama of arcade alf ua 2 

games, Bill Hogue's SUPER NOVA is now running.) % - ae 4 


The scene is the blackness of your monitor...and your ship is the little 
white thing in the very center. Your mission, should you chose to accept it,: 
is td destroy as many asteroids and aliens (no questions asked) before you ere 
killed. ў 

You control your ship with five control keys and two hands. Тһе left hana 
hovers over the "R" and "Т" keys, while the right controls the "O" and "р" кема. 
The space bar is pressed with either thumb. The "R" key rotates your ship taf 
your, left and the "T" key does it to the right.'ss5D" applys thrust and the "P 
key fires you phasers. The space bar causes you to disappear from the sere 
and reappear randomly (you TREKKIES will recognize this as hyperspace or war 4 
drive). қ А 

When the game begins, you аге centered апа the large asteroids arc ЕТТІ | 
around you. Upon hitting the asteroids with your phasers, the large asteroids 
become medium sized, which in turn become small, all in multiples ctytwo. Alie 
ens ате numerous in type and never in short supply. Luckily only one сап ape 
эп the screen at one time. Aliens are always worth more than qa 
a maximum of 2000 points each. dpt 




















iis 


the 















"hen the game starts, your arsenal holds three ships. An extra ship із a- 
warded at each multiple of 10,000 points. You are destroyed bv coming in cons! 
tect with enemy fire, the enemy itself, or, of course, an asteroid. ål 


That's how the game is played. Now, for my favorite features of this prom 
gram. First, the program is menu driven with good instrui pasos AUR LL ode. thi 
program. Next, you can quit whenever you wish with the = (LEARY and =BREAK= | 
keys. Third, a One or two player game is allowed. Fourth, the graphics ага 
indescribably, Finally, not only does the program remember е.Жор score, 1 
remembers the top 10! (with initials!) ЖТ 5 dg LN А 

Now, for the bad points...Uh...oh...sound. The program has no sound. 
that such а crime?) Well, that must mean the biggest problem is the fact t] 
SUPER NOVA will not fit in 4k. i CA We РУ 

SUPER NOVA is written in machine language and'sold by Big уе SOftware. 
hear that joysticks and a joystick version are available. a 



















THE PROGRAM DOCTOR..... 


HAVING A DROBLEM WITH YOUR BASIC PROGRAMS? Ask 
the PROGRAM DOCTOR for help. Send your programs 
on cassette or printed list for testing. The 


PROGRAM DOCTOR will also try to help with other 








System programs and answer programming questions. 


OR ACKORCKCKCR CK OE OKO ee Û OK ee eee АЖА KORR KORG GIG 


KNOW OF A PROGRAM IN ANOTHER “LANGUAGE 
(LIKE COBOL OR FORTRAN) THAT YOU WANT 
TO USE ON YOUR TRS-80? ASK THE PRO- 
GRAM DOCTOR TO HELP YOU TRANSLATE ТТ 
INTO BASIC SO YOUR TRS-80 САМ UNDER- 
STAND IT. MAIL PROBLEMS TO THE PRO- 
GRAM DOCTOR, С/О USERS' NEWS, Р.О. BOX 
20000 4220, HOUSTON, TEXAS, 77025. 


NOOO IO kk ko kk e Ke Kk ek ek deck Kok X ok eo Re e Ke RR I e 


(Emory C. Wood) received a 
College and 
Lamar 


THE PROGRAM DOCTOR 
A.A.S. Data Processing from Lee Jr. 
his B.S. in Engineering Technology from 
University. He worked in programming for the 
City of Baytown for 1 1/2 years and was the 
Systems Programmer for Cravens Dargan & Co. for 
over 3 1/2 years. He is now working with the 
computers at Joy Petroleum. Не has had exper- 
ience in various languages: Cobol, Basic, For- 
tran, RPG, ALC, Compass and Easycoder. He owns 
а TRS-80 Level II, 16k. 
ЖИЕЕВТТТЕТЕЕТТТТТИ ТТТТТТТЕТІТТТТТТТІ 


: VERBATIM 
DISKS 


54 $3995 t 
8 85495. 





ZYTRON ENERGY MANAGEMENT 


6853 SOUTHWEST FREEWAY 


HOUSTON, TEXAS 77074 


WES LUSTER I 


(713) 981-8886 4 
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Elmer bailey reports 
that according to a 
letter on Page 16 of 
the March 1961 issue of 
80 MICROCOMPUTING, the 
character generator w/ 
lower case  descenders 
for the Model I is avail- 
able for $ 12.93, includ- 
ing postage. fhe part 
can be ordered from: 


Radio Shack Customer Service 
Dept. 0821 

1803 South Beach Street 

Fort Worth, Texas 76105 


Ask for a "Character 
Word Processor",Part 
number AXX-3027,  cata- 
log number 26-1104. 


Elmer adds that the 
original IC is soldered 
in апа is not easy to 
remove. He advises those 
who don't know how to re- 
move it, to get someone 
to help. Не also noted 
that if it is removed,a 
а good socket should be 
installed before plug- 
ging in the new one. 


Elmer also reported 
that in an article in 
the March 1981 issue of 


BYTE, it was mentioned 
that 32k сап Бе іп- 
stalled іп the Color 


Computer by piggy-back- 
ing the second 16k. He 
said it really  works!! 
He watched a friend in- 
stall 32k in his compu- 
ter andit took him less 
than half an hour to do 
its 


REMEMBER. ...Magazine ar- 
ticle reviews are needed 
for USERS' NEWS. Short 
or long reviews will be 
welcome, 


MAGAZINE ARTICLE REVIEWS - 











